home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Gold Collection
/
Software Vault - The Gold Collection (American Databankers) (1993).ISO
/
cdr18
/
cil23kit.zip
/
KITMONO.BAT
< prev
next >
Wrap
DOS Batch File
|
1993-05-01
|
5KB
|
221 lines
@ECHO OFF
REM Don't forget to copy this to other BAT if used by SHELL and EXTx.bat.
REM I use this as 2.bat during SHELL and EXTDOWN2.BAT....
CLS
:CHOICE
CALL SETS.BAT
SET EX=%0.BAT
CLS
SET TXHOW=
TYPE SHOWKIT.TXT
REM "ECHO's are followed by ALT 255, a blank"
ECHO
CIASK Enter your choice : TXHOW
CLS
IF ".%TXHOW%"=="." SET TXHOW=%DP%
FOR %%F IN (0 x X) DO IF '%TXHOW%'=='%%F' GOTO END
REM ═══════════════════════════════
REM Checks for Protocols
REM DSZ/GSZ Checks
FOR %%F IN (z Z) DO IF '%TXHOW%'=='%%F' DSZBOTH.BAT
FOR %%F IN (g G) DO IF '%TXHOW%'=='%%F' ZYMGBOTH.BAT
FOR %%F IN (y Y) DO IF '%TXHOW%'=='%%F' ZYMOBOTH.BAT
FOR %%F IN (f F) DO IF '%TXHOW%'=='%%F' ZXKGBOTH.BAT
FOR %%F IN (q Q) DO IF '%TXHOW%'=='%%F' ZX1KBOTH.BAT
FOR %%F IN (c C) DO IF '%TXHOW%'=='%%F' ZXCRBOTH.BAT
FOR %%F IN (w W) DO IF '%TXHOW%'=='%%F' ZXOTBOTH.BAT
FOR %%F IN (o O) DO IF '%TXHOW%'=='%%F' CALL DSZTERM.BAT
IF .%TXHOW%==.1 GSZBOTH.BAT
IF .%TXHOW%==.2 GYGMBOTH.BAT
IF .%TXHOW%==.3 GYMOBOTH.BAT
IF .%TXHOW%==.4 GXKGBOTH.BAT
IF .%TXHOW%==.5 GX1KBOTH.BAT
IF .%TXHOW%==.6 GXCRBOTH.BAT
IF .%TXHOW%==.7 CALL GSZTERM.BAT
REM Individual Checks
FOR %%F IN (h H) DO IF '%TXHOW%'=='%%F' HSLBOTH.BAT
FOR %%F IN (s S) DO IF '%TXHOW%'=='%%F' SZBOTH.BAT
FOR %%F IN (t T) DO IF '%TXHOW%'=='%%F' TBOTH.BAT
FOR %%F IN (a A) DO IF '%TXHOW%'=='%%F' ZITCBOTH.BAT
FOR %%F IN (b B) DO IF '%TXHOW%'=='%%F' BIMOBOTH.BAT
FOR %%F IN (m M) DO IF '%TXHOW%'=='%%F' MPTBOTH.BAT
FOR %%F IN (d D) DO IF '%TXHOW%'=='%%F' DBOTH.BAT
FOR %%F IN (e E) DO IF '%TXHOW%'=='%%F' EBOTH.BAT
FOR %%F IN (i I) DO IF '%TXHOW%'=='%%F' IBOTH.BAT
FOR %%F IN (j J) DO IF '%TXHOW%'=='%%F' JBOTH.BAT
FOR %%F IN (k K) DO IF '%TXHOW%'=='%%F' TASYBOTH.BAT
FOR %%F IN (l L) DO IF '%TXHOW%'=='%%F' ZMAXBOTH.BAT
FOR %%F IN (n N) DO IF '%TXHOW%'=='%%F' TXZMBOTH.BAT
FOR %%F IN (p P) DO IF '%TXHOW%'=='%%F' CALL TXZMTERM.BAT
FOR %%F IN (r R) DO IF '%TXHOW%'=='%%F' RBOTH.BAT
FOR %%F IN (v V) DO IF '%TXHOW%'=='%%F' VBOTH.BAT
FOR %%F IN (o O 7 p P) DO IF '%TXHOW%'=='%%F' GOTO CHOICE
REM ═════════════
REM Checks for "User Options" "Shells" "Tools"
rem IF .%TXHOW%==.` GOTO REVMARK
IF .%TXHOW%==.+ GOTO HSLSHELL
IF .%TXHOW%==.- GOTO EDITHSL
IF .%TXHOW%==._ GOTO SHOWHSLST
IF ."%TXHOW%"==."'" GOTO HSL2FILES
IF .%TXHOW%==.( GOTO TAGFILES
IF .%TXHOW%==.) CALL USHELL1.BAT
IF .%TXHOW%==.) GOTO CHOICE
FOR %%F IN (u U) DO IF '%TXHOW%'=='%%F' CALL USHELL2.BAT
FOR %%F IN (u U) DO IF '%TXHOW%'=='%%F' GOTO CHOICE
IF .%TXHOW%==.{ GOTO MEMORY
IF .%TXHOW%==.} GOTO MEMTOOL
IF .%TXHOW%==.%;% GOTO FILES2HSL
IF ."%TXHOW%"==."." GOTO SHOWFILES
IF .%TXHOW%==.[ GOTO EDITOR
IF .%TXHOW%==.] GOTO FILEMGR
IF ."%TXHOW%"==."\" GOTO EDITLST
IF ."%TXHOW%"==."/" GOTO QUICKTAG
IF ."%TXHOW%"==."?" CALL HELPKIT.BAT
IF ."%TXHOW%"==."?" GOTO CHOICE
IF ."%TXHOW%"==.""" GOTO ASKDIR
IF ".%TXHOW%"==".~" GOTO SHOWENV
IF ".%TXHOW%"==".!" GOTO EDITEXTBAT
IF ".%TXHOW%"==".@" GOTO EDITSETS
IF .%TXHOW%==.# GOTO #MARK
IF .%TXHOW%==.$ GOTO $MARK
IF ."%TXHOW%"==."%%%" GOTO PCTMARK
IF ."%TXHOW%"==."^" GOTO ^MARK
IF .%TXHOW%==.& GOTO &MARK
IF .%TXHOW%==.* GOTO STARMARK
IF .%TXHOW%==.8 GOTO 8MARK
IF .%TXHOW%==.9 GOTO 9MARK
REM Display message for Unrecognized or Non-supported Command.
CLS
ECHO
ECHO
ECHO
ECHO
ECHO
ECHO Command : %TXHOW% - is not supported !
ECHO
ECHO
ECHO
ECHO
ECHO
PAUSE
GOTO CHOICE
:ASKDIR
CLS
ECHO
ECHO Direstory Listing for TAGIT
ECHO
ECHO Press ALT SPACE to Activate TAGIT
ECHO
ECHO C:\UPLOAD or C:\DOCS\*.DOC or C:\FILES\T*.ZIP
ECHO
ECHO Default = %UL%\*.* BLANK= Current Directory
ECHO
SET TXHOW=%UL%
CIASK Search Path : TXHOW
CLS
DIR %TXHOW% |MORE
PAUSE
GOTO CHOICE
REM ═════════════
REM Tools Section
:MEMORY
MEM /C |MORE
PAUSE
GOTO CHOICE
:MEMTOOL
REM MFT is QEMM Manifest; you can replace as needed
MFT
GOTO CHOICE
:FILES2HSL
IF EXIST %FL% COPY %FL% %HL%
ECHO COPIED %FL% TO %HL%
PAUSE
GOTO CHOICE
:SHOWFILES
TYPE %FL% |MORE
PAUSE
GOTO CHOICE
:EDITOR
%ED%
GOTO CHOICE
:FILEMGR
REM Put file manager here, like Nortom Commander. Watch memory !
ECHO Place File Manager for "]" after :FILEMGR
PAUSE
GOTO CHOICE
:EDITLST
%ED% %FL%
GOTO CHOICE
:QUICKTAG
DIRN.EXE
GOTO CHOICE
REM ══════════════
REM Shells Section
:HSLSHELL
HSLSHELL
GOTO CHOICE
:EDITHSL
%ED% %HL%
GOTO CHOICE
:SHOWHSLST
TYPE HSLSHELL.LST |MORE
PAUSE
GOTO CHOICE
:HSL2FILES
IF EXIST %HL% COPY %HL% %FL%
ECHO COPIED %HL% TO %FL%
PAUSE
GOTO CHOICE
:TAGFILES
TAGFILE
GOTO CHOICE
REM ════════════
REM User Options
:SHOWENV
SET |MORE
PAUSE
GOTO CHOICE
:EDITEXTBAT
EDITORX.BAT
:EDITSETS
%ED% SETS.BAT
GOTO CHOICE
:#MARK
ECHO Place Command for "#" after :#MARK
PAUSE
GOTO CHOICE
:$MARK
ECHO Place Command for "$" after :$MARK
PAUSE
GOTO CHOICE
:PCTMARK
ECHO Place Command for "%TXHOW%" after :PCTMARK
PAUSE
GOTO CHOICE
:^MARK
ECHO Place Command for "^" after :^MARK
PAUSE
GOTO CHOICE
:&MARK
ECHO Place Command for "&" after :&MARK
PAUSE
GOTO CHOICE
:STARMARK
ECHO Place Command for "*" after :STARMARK
PAUSE
GOTO CHOICE
:8MARK
ECHO Place Command for "8" after :8MARK
PAUSE
GOTO CHOICE
:9MARK
ECHO Place Command for "9" after :9MARK
PAUSE
GOTO CHOICE
:REVMARK
ECHO Place Command for "`" after REVMARK
PAUSE
GOTO CHOICE
GOTO END
:END